home *** CD-ROM | disk | FTP | other *** search
/ .net (Turkey) 1998 March / .net Internet Dergisi - CD 5.iso / pc / NETCD41.dir / 00040_Script_40 < prev    next >
Text File  |  1997-12-11  |  600b  |  27 lines

  1. on vDUNCAN
  2.   global MIAW, titleBar, dxrName
  3.   if objectP(MIAW) then
  4.     forget MIAW
  5.   end if
  6.   set horzOrigin to the stageLeft +152
  7.   set vertOrigin to the stageTop +107
  8.   set MIAWRect to rect(horzOrigin,vertOrigin,horzOrigin +336, vertOrigin +244)
  9.   
  10.   set MIAW to window titleBar
  11.   set the windowType of window titleBar to 4
  12.   set the modal of window titleBar to TRUE
  13.   set the rect of MIAW to MIAWRect
  14.   set the fileName of MIAW to dxrName
  15.   open MIAW
  16. end
  17.  
  18. on stopMovie
  19.   finishMovie
  20. end
  21.  
  22. on finishMovie
  23.   global MIAW
  24.   if objectP(MIAW) then
  25.     forget MIAW
  26.   end if
  27. end